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REASON 





MR FIELD OUT OF SE- 
QUENCE IN St FILE 
RECORD UNIDENTIFIED 
IN ST FILE 

CARO TYPE OUT OF SE- 
QUENCE IN SECONDARY 
($2) FILE 

MR FIELD OUT OF SE- 
QUENCE IN 52 FILE 
RECORD UNIDENTIFIED 
IN $2 FILE 

RECORD UNIDENTIFIED 
IN CHAINING FILE ‘Ct 


C2 RECORD UNIDENT#- 
FIED 

C3 RECORD UNIDENTI+ 
Fieo 

RECORD UNIDENTIFIED 

IN CALCULATION CHAINED 
FILE 9 

RECORD UNIDENTIFIED 

IN CALCULATION CHAINED 
FILE 2 

RECORD UNIDENTIFIED IN 
CALCULATION CHAINED 
FILE 3 

HI HALT 


H2 HALT 

Hi & H2 HALT 

EOF SENTINEL READ 
DIVIDE CHECK ERROR 


PROGRAM NOT FOUND 


1/0 ERROR ON UNIT « 
1/0 ERROR ON UNIT « 


GENERATION COMPLETE 
OR EOF SENTINEL READ 
A 1004 1/0 ERROR 


READ OR WRITE TAPE ERROR 


1004 READER ERROR 
1004 CARD COUNT ERROR 
HOLE COUNT ERROR ON 1004 





RPG DISPLAYS 


DISPLAY 


ACTION 
ASOENS 
SAME AS OEI1 


SAME AS OE11 


SAME ASOEVM 
SAME AS OEI1 


PHESS START TO GET 
ANOTHER RECORD FROM 
FILE 

SAME AS 0E43 


SAME AS 0E43 


PRESS START TO BYPASS 
RECORD IN ERROR 


PRESS START TO BYPASS 
RECORD IN ERROR 


PRESS START TO BYPASS 
RECORD IN ERROR 


PRESS START TO CON- 

TINUE 

SAME AS OEFO 

SAME AS OEFO 

RUN COMPLETED 

CORRECT ERRORS RE- 

RUN 

CORRECT ERROR & RERUN 
UNRECOVERABLE 

KEYIN NONZERO INTO 
LOCATION 4 TO TRY 

AGAIN 

MOS CONTROL TRANSFER 

TO EOS ROUTINE 

PRESS MANUAL ALTERATION !. 
FEED ONE CARO IF NECESSARY. 
SET MANUAL ALTERATION 1 OFF 
ANDO PRESS RUN ON 1004. PRESS 
START ON 9200/9300 CONSOLE. 


PRESS START TO ATTEMPT 
RECOVERY ON KEYIN Of TO 
CANCEL, 

UNRECOVERABLE. 

PRESS START 10 IGNORE, 

SET MANUAL ALTERATION 3; 
RUN OUT LAST CARD; INPUT 
LAST TWO CARDS AGAIN. RESET 
MANUAL ALTERATION 1; READ 
ONE CARO; PRESS RUN ON 1004, 
PRESS ONE CARD; PRESS RUN 
ON 1004. PRESS START ON 
9200/9300 CONSOLE. 


se 
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LABEL INFORMATION — EXPIRATION DATE 





LABEL INFORMATION = VOLUME NUMBER 





LABEL INFORMATION ~ GENERATION NUMBER 


LABEL INFORMATION = CREATION OATE 





LABEL INFORMATION — FILE IDENTIFICATION 





SEVENTH CHANNEL NUMBER 





SEVENTH LINE NUMBER 





fo - oe] 


SIXTH CHANNEL NUMBER 





SIXTH LINE NUMBER 





FIFTH CHANNEL NUMBER 





FIFTH LINE NUMBER 





FOURTH CHANNEL NUMBER 





FOURTH LINE NUMBER 





THIRD CHANNEL NUMBER 








THIRD LINE NUMBER 





SECOND CHANNEL NUMBER 





SECOND LINE NUMBER 





FIRST CHANNEL NUMBER 


FIRST LINE NUMBER 








L=LINE COUNTER SPECIFICATIONS CARD IDENTIFICATION, MANDATORY ENTRY 





LINE COUNTER SPECIFICATIONS 














DISPLAY 


OOOF 








0333 
ocx 


OC x2 
OCcx3 


OCKxs 


OCcxsS 
OCcFF 
ooo! 
ooo 


opt 


obi2 


oDt3 
oD14 


001s 
OoDié 
oDI7 
opie 
ODd19 
0020 
oDat 


oDp22 
0023 


0D30 


ooa1 


0032 


oe 


OEI2 


OE 


oe2) 





REASON 


MEMORY EXCEEDED OUR- 
ING GENERATION 
GENERATION COMPLETE 
Osc * PRIME DATA 
AREA FULL 

DISC KOVERFLOW AREA 
FULL 

DUPLICATE KEY FOUND 
ON DISC x 

RECORD MISSING ON 
DIsc x 





RECORD OUT OF SE- 
QUENCE ON DISC x 
DISC HAROWARE ERROR 


SOURCE CODE ERRORS. 
NOT FATAL 

HEADER CONTROL CARD 
STERLING ERROR 

NO CONTROL CARD 


HEADER CONTROL CARD 
ERRORS IN COLS. 13 & t@ 
OR IN 23-25 

PROGRAM !S TOO LARGE 
SOURCE CODE ERRORS. 
FATAL 

SUBROUTINE NOT OE- 
FINED.BY EXIT 

CARO COUNT ERROR IN 
RPG OR SUBROUTINE 
SUBROUTINE LABEL NOT 
DEFINED BY RL ABL 
TABLE LENGTH DEFINI- 
TION ERROR 
SUBROUTINES MISSING 
OR INSERTED WRONG 
PROGRAM AS GENERATED 
EXCEEDS MEMORY 

TOO FEW TABLES 

TOO MANY TABLES 

NO FILE DESCRIPTION 
CARD FOR CAL CULAs 
TION CHAIN FILE 

RPG GENERATOR CARD 
SEQUENCE ERROR 

NO L CARD OR NO SEN- 
TINEL FOLLOWING L 
CARO 

CHANNEL INL CARO IS 
OVER 07 

CARO TYPE OuT OF SE- 
QUENCE IN PRIMARY 
FILE 

MATCHING RECORDS 
FIELD OUT OF SE- 
QUENCE !N PRIMARY 
FILE. 

RECORD UNIDENTIFIED 
IN PRIMARY FILE 

CARD TYPE OUT OF SE- 
QUENCE IN SECONDARY 
(St) FILE 





RPG DISPLAYS 









ACTION 


REVISE INPUT & RERUN 





PRESS START TO RUN 
PRESS START TO CLOSE 
GILES @ CANCEL JO8 
SAME ASOCKI 


PRESS START TO IGNORE 
RECORD 

iF RA FILE: PRESS 
START TO IGNORE REC- 
cORD 

PRESS START TO IGNORE 
RECORD 

PRESS START TO CLOSE 
FILES & CANCEL JOB 
PRESS START TO RUN 


CORRECT ERRORS & 
RERUN 

REFEEO CONTROL CARD & 
LAST 2 CAROS READ. 
PRESS START 

SAME AS ODtt 


REVISE INPUT & RERUN 
CORRECT ERRORS & 
RERUN 

SAME AS OD 14 


SAME AS OD14 
SAME as ODi4 
SAME ASOD4 
SAME AS OD14 
REVISE INPUT & RERUN 


CORRECT ERROR & RERUN 
SAME AS OD2t 
CORRECT ERROR & RERUN 


CORRECT ERROR & RERUN 


SAME AS 0021 


SAME aS 0D21 


'F CARD READER: PRESS 
START TO BYPASS CARD 
IN ERROR. CARD IS 

NEXT TO LAST IN STACK. 
1F CARD CONTROLLER: 
CARD IN POST-READ 
STATION CAUSED ERROR. 
CARD IN PRE-READ STA- 
TION 1S PROCESSED 
NExT . 






























































5455/56 57 


CLOSE REWIND WITH INTERLOCK 
CLOSE REWIND WITHOUT INTERLOCK 
NO REWIND 





E = FILE 1S TO BE EXTENDED: B= FILE NOT EXTENDED 
LOGICAL UNIT NUMBER OF THIS FILE; 


IF BLANK, 01 1S ASSUMED. 





USER-DEFINED FILE NAME TO 
COL. 64-70 
RECEIVE OBJECT PROGRAM: IF Bart 


BLANK, RPGOUTPT IS ASSUMED. TRANSIENT 
RPG ONLY 


SAME CODES AS COL. 56 
GET CODING TRANSIENT 
PUT CODING TRANSIENT 
BOTH GET ANO PUT CODING TRANSIENT 
= GET AND PUT CODING IN LINE 


FOR TAPE IOCS GET/PUT CODING TRANSIENT 
REAO/WRITE CODING TRANSIENT 
BOR SEQUENTIAL: BOTH GET/PUT AND READ/WRITE CODING TRANSIENT 


FOR INDEX SEQUENTIAL: & = Grr/put AND READ/WRITE CODING IN LINE 


S = SETL/ESETL CODING TRANSIENT, Bb = SETL/ESETL CODING IN LINE 


10 CHARACTERS S~8 OF OBJECT PROGRAM (NCOS-COS ONLY) 





HEXADECIMAL ADORESS FOR TOF OF MEMORY FOR THIS PROGRAM (USED 
In Cos) 


HEXADECIMAL BASE ADDRESS FOR GENERATED PRO- 
GRAM. USED WITH NCOS AND COS. 
BLANK - OBJECT PROGRAM BASE ADDRESS = RPG BASE 


ADD * 
Hier PUNCHES 1N COL, 73-76 OF OBJECT DECK 
UP TO 4 CHARPACTE? 1.0. OT ORIECT PROG?AM — OR ID FIELD ON TAPE/DI sc 


IF USING NCOS C= 1001 CONTROL STREAM INPUT 
BLANK =READER CONTROL INPUT 


M = HARDWARE MULTIPLY, DIVIDE, EDIT ON OBJECT COMPUTER 
BLANK = SOFTWARE M/D/E 


48 ~ 48 CHAR. BAR, BLANK *= 63 CHAR, BAR FOR TYPE OF PRINT BAR USED 
DURING GENERATION 


B 96=96. 120= 120, 132=132 FOR NO. OF PRINT POSITIONS USED IN OBJECT PROGRAM 


BLANK = DECIMAL POINT NUMERIC LITERALS 1 = DECIMAL COMMA NUMERIC LITERALS 
PENCE OUTPUT FORMAT 11 = HOLLERITH BOTH BLANK®PENCE FORMAT 
SHILLING OUTPUT FORMAT {2 = BS! BOTH 0 = PRINT ONLY 

PENCE INPUT FORMAT BOTH BLANK = PENCE FORMAT 
SHILLING INPUT FORMAT 


FOR STORAGE CAPACITY OF 
SYSTEM USED TO GENERATE & EXECUTE 


BLANK = NO PUNCHING R= PUNCH OBJECT (ROW PUNCH) S= PUNCH OBJECT (SERIAL PUNCH) 
NCOS-ROR S=GENERATE OBJECT PROGRAM ON TAPE/DISC LOGICAL UNITI 
BLANK = GENERATE AND RUN 


H = RPG CONTROL CARD IDENTIFICATION; MANDATORY ENTRY 


*2=2 TAPE CHANNELS AND PRINTER USED (MOS) 
**D=LOAD FROM DAS LOADER 
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FORM CHAINING F 
TYPE FIELD NUMBER ‘i 





4 
‘ 


To 
FILE NAME 


ANY COMMENTS CONCERNING 
TABLES MAY BE ENTERED HERE. 
NOTE: TABLE NAMES THAT ARE TO 
BE REFERENCED BY A SUBROUTINE 
BY AN RLABL STATEMENT MUST BE 
RESTRICTED TO FOUR CHARACTERS. TAB 
. : 4 : » | FOLLOWED BY ONE LETTER OR NUMBER. 
RT : e e : 
aie NAME Or THE ff p : VV REY 
FILE TO WHICH THE TABLE IS TO BE WRITTEN OR THE 
NAME OF CHAINED OR DISC FILE USING RA OR TAG 
FILES. ANY FILENAME MAY BE USED THAT HAS BEEN : 
DEFINED ON THE FILE DESCRIPTION FORM } [4 tHe tneut 
; RECORD. TAB FOLLOWED BY ONE TO THREE LETTERS OR NUMBERS 


(TABXXX). 


ENTER NUMBER OF ENTRIES IM ONE INPUT RECORD PERTAINING TOG THE 
TABLE SPECIFIED IN COLS 27-32. RIGHT JUSTIFY ENTRY. 


IF NUMERIC TABLE, ENTER 0-9 FOR NUMBER OF DECIMAL POSITIONS. 


ENTER LENGTH OF ONE ENTRY OF TABLE SPECIFIED IN COLS 27—32. MAX: ALPHA 
EN TRIES—80, NUMERIC C-15. RIGHT JUSTIFY ENTRY 


CARD RPG DOES NOT USE COLUMNS @Q, 10. 11-18, 19-26, 43, AND 55. 


FILE EXTENSION SPECIFICATIONS 















7 T i Ly ey 1 Poy POS ee EO ta hy Tbe] eg 
5 1 ih 2 25 3c 35 4c 4 L199 BS: oz 65 . 75 
FILE ORGANIZATION 
END OF FILE RALTNRE 
D OUENTE EXTENSION 


PROGRAM 


v 
DEVICE IDENTIFICATION 


COMMENTS 


80] 


ENTER NAME : 
OF DEVICE : a 
: a : USED WITH IN- 
ENTRY RIGHT+ oa ASSOCIATED : DEXED SEQUEN- ENTER 


S WITH THE TIAL FILES Ae 
JUSTIFIED. IF FILE: CCPRI, ee 4 L NAME OF 


FIXED, ENTER ; 1 
: ccsec, : : nae 
RECORO SIZE; IF READER, : 


VARIABLE, ENTER 
VanGeeT sige. READ 104, 
PUNCH, CRP, 


4 ore . 

" oO is kesuM co RRP, : {Be BLANK FOR 
VIF INPUT; O IF OUTPUT; C IF Te PICO e AR. ROWPNCH, Vol CALCULATION 
COMBINED (READ & PUNCH); U | fl ceconon RGR : PNCH 104, TIME CHAINED 
1F UPDATE 48410, 0008 For | _ PRINTS63, ie FILES) 


8411/8414. eaniie 


PRINTOR, TAPE & DISC ONLY: BLANK © FILE IS 
PRNT 104, UNLABELED; S - STANDARD LABELS; 
TAPE, TAPE7, N-+NONSTANDARD LABELS. OUTPUT 
OR DISC. FILES CANNOT USEN. 
ee : ENTRY ts 
ALL FILES CONTAINING E MUST BE PER NETH LEFT-JustT- 
| PROCESSED BEFORE LR IS TURNEC fF § be SEQUENTIAL IFIED 
| ON. IF ALL. FILES ARE BLANK, ALL USING TAG FILE, 
ARE PROCESSED BEFORE LR 1S ON. I+ INDEXED SEQ- 
UENTIAL FILE, 
| T+ TAG FILE; 
BLANK = SEQU EN- 
i i : ENTER LENGTH OF TAL GES 
| TAPE AND DISC FILES ONLY: F IF Pe] FIELD IN AN RA FILE USED SEQUEN- 
FIXEO-LENGTH; V IF VARIABLE- LENGTH OF KEY IN TIALLY 
LENGTH RECORDS Fa] INDEXED SEQUEN- 
TIAL FILE, 07 FOR 
8410 TAG FILE OR 
O08 FOR 8411/8414 
TAG FILE 





FILE DESCRIPTION 





‘sl bel 





25] 3c asl acl | 7 cc Sie 7 ee ae yes rol i 7s ee sol 
FORM OPTION RECORD DECIMAL 
NUMBER INDICATOR 7 


PORMAT POSITIONS 


STERLING 
SIGN ; 
POSITION 


471 74 





USE WHEN PROCES: 
| SING STERLING 


47 CURRENCY AMOUNTS 


IF TWO POSI- 7 
TIONS ARE TOF: 
BE TESTED 

FOR IDENTI- 
FYING CODES, 
ENTER 

SECOND POSI- 
TION ENTRY 
HERE. 


NUMERIC ENTRY TO ORDER 
RECORDS, ALPHA ENTRY 

iF NO SEQUENCE NEEDED: E 
ALPHA FILES MUST APPEAR FIRST 


s{WHEN DESIRED TO : Hs 4 ENTER INDICATOR TO BE 
: : SELECT CARDS READ 8 4k m4SET ON FOR VALUES OF A 
4 f S a 4 4 INUMERIC FIELD LESS THAN 
ENTERO IF RECORD OPTIONALIN La : : {RECORD ZERO.(X PUNCH IN UNITS 
GROUP, BLANK IF REQUIRED INDICATOR |POSITION) NOT FOR ALPHA 
in sae a OF RECORD |FIELDS 
ENTERLITOLOPATIN OR RELA- 
TO INDICATE TIONSHIP TO SHOW WHICH FIELD 
CONTROL Pe ]is IN EACH RECORD OR CONTROL 
NUMERIC FIELD:0-9 FOR LEVEL OF LEVEL INDICATOR TO INDICATE 
DECIMAL POSITIONS, ALPHA FIELD Pa] CHAINING FIELDS. 


ENTER POSITION THAT CONTAINS THE : 5 Heat 
IDENTIFYING CODE FOR A SPECIFIC ; DEFINED. 
RECORD TYPE. RIGHT JUSTIFY ENTRY Brey et RE ONS FIELD CAN- 
ENTRY MUST BE NUMERIC % NOT BE IN 
PACKED 
FORMAT 


DATA 
FORMAT 


STERLING 
SIGN 
POSITION 


1 74 


ENTER NAME OF EACH 

OUTPUT FILE. ENTRY 

REQUIRED; LEFT JUSTIFY; 

NO BLANKS OR SPECIAL USED WHEN PRO- 
CHARACTERS. FIRST CHAR- NAME FROM PiFf OUTPUT FIELD ISTO BE IN CESSING STERLING 
ACTER MUST BE ALPHA. INPUT OR PACKED FORMAT CURRENCY 

NAME MUST CONFORM TO 3 CALCU- = : 3 s AMOUNTS."'SINCOL, 
THE NAME SPECIFIEDON THE LATIONS T4INDICATES 

FILE DESCRIP TION FORM. SHEET. ‘ 

ENTRY REQUIRED FOR EACH 


STERLING OUTPUT 
LEFT § eae is a : 
FILE DEFINED JUSTIFY 


ENTRY, NO 
BLANKS OR 
SPECIAL 
CHAR, 
FIRST CHAR. MUST BE ALPHA, USE "PAGE 
NUMBER. USE “D? TE” 





TO PRINT PAGE 
FOR DATE IN SUPERVISOR. 


1 OR 2 TO SPACE AFTERPRINTING 


IF TWO INDICATOR CONDITIONS MUST BE MET TOPERFORM OUTPUT 
DESCRIBED, ENTER SECOND INDICATOR HERE 
Of TO 07 FOR SKIPPING TO CHANNEL POSITION 
AFTER PRINTING 





OUTPUT FORMAT SPECIFICATIONS 


i 


N IF INDICATOR 
OFF CONDITION 
REQUIRED; 
BLANK (tF 
OPPOSITE 


ENTER THE FIELD 
NAME OR LITERAL 
TO BE USED IN THE 
CALCULATIONS OR 
THE KEY FIELD 

OR LITERAL To BE 
USEO FOR CHAINING. 
FIELD NAME MUST 
HAVE BEEN 
DEFINED ELSE- 
WHERE (LENGTH, 
ETC.). LEFT 
JUSTIFY ENTRY. 
FLELD NAME=6 
POSITIONS,NUMERIC 
LITERALS—10 
POSITIONS OR 9 
PLUS SIGN. ALPHA- 
NUMERIC LITERALS- 
8 CHARACTERS. 


EBCDIC ENCLOSED 
iN SINGLE QUOTES, 
HEXADECIMAL 
LITERALS 6 DIGIT 
ENCLOSED 1N 
SINGLE QUOTES & 
PRECEDED BY X. 
EE : USE UPSt TO 


‘ ACCESS LOCATION 
SECOND INDICATOR — 

CONDITIONS THAT MUST 
BE MET TO PERFORM 
CALCULATIONS ENTERED 


XOt17' tN THE 
SUPERVISOR. 





COLS. 7 TO 17 IF THESE COLUMNSARELEFT 
BLANK, THE CALCULATIONS 
SPECIFIED WILL BE EXECUTED 
FOR EVERY DETAIL RECORD 





ENTER THE FIELD 
NAME OR LITERAL 
TO BE USED IN THE 
CALCULATIONS OR 
THE NAME OF A 
CHAINED FILE. 
FOLLOWS THE 

SAME RULES AS 
FACTOR TIN 
COLUMNS 18~27, 
USE UPSI TO ACCESS 
LOCATION X'O1S7" IN 
THE SUPERVISOR, 


Lil | 


es! 


i<Te) 
DECIMAL HALF 
POSITIONS ADJUST 


COMMENTS 


ENTER COMMENTS CONCERN- 
ING CALCULATIONSHERE 


ENTER LENGTH OF RESULT FIELD. ENTER ONLY ONCE FOR EACH 
RESULT FIELD NAME.MAX, LENGTH NUMERIC FIELD 25,ALPHA 
FIELD 255. 





CALCULATION SPECIFICATIONS 














